home *** CD-ROM | disk | FTP | other *** search
/ By Popular Request 2.0 / By Popular Request 2.0 (Arsenal Computer).ISO / amiga_3 / ezbbs221.lha / c / UnsetEazymailAll.sh < prev    next >
Text File  |  1995-04-09  |  1KB  |  43 lines

  1. # cshell script
  2.  
  3. #resident `which unspace`
  4. set _except "20;abortline"
  5. cd MB_USER:
  6.  
  7. if -f UULIB:Aliases
  8.     echo Removing EazyBBS aliases from UULIB:Aliases ...
  9.     foreach user ( * ) {
  10.         set username = `mb:c/unspace $user`
  11.         set _lasterr 0
  12.         Search >nil: UULIB:Aliases $username": " QUIET
  13.         if -nr $_lasterr 0 >
  14.             echo Removing alias $username
  15.             # ignore: op:killline $username": \*\"\*\|mail2eazy "$user\*\"
  16.             # Don't ask why, but it work's only this way.
  17.             # Cshell has a special internal representation of usernames with spaces in them.
  18.             MB:C/KillLine <UULIB:Aliases >UULIB:Aliases.new $username": \*\"\*\|mail2eazy "$user\*\"
  19.             Copy UULIB:Aliases.new UULIB:Aliases QUIET
  20.             Delete UULIB:Aliases.new QUIET
  21.         endif
  22.     }
  23. else
  24.     echo Removing EazyBBS folders from UUMAIL: ...
  25.     foreach user ( * ) {
  26.         set username = `mb:c/unspace $user`
  27.         set folderlen = @filelen( uumail:$username )
  28.         if -r $folderlen 50 <
  29.             echo Removing uumail:$username
  30.             rm uumail:$username
  31.         endif
  32.     }
  33. endif
  34.  
  35. dswap
  36. unset _except
  37. unset user
  38. unset username
  39. unset killline
  40. #resident -r unspace >nil:
  41. echo Done.
  42.  
  43.